<?php
  function F_DMES($mes)
  {
	switch($mes)
	{
		case '01': $desc="ENERO";      break;
		case '02': $desc="FEBRERO";    break;
		case '03': $desc="MARZO";      break;
		case '04': $desc="ABRIL";      break;
		case '05': $desc="MAYO";       break;
		case '06': $desc="JUNIO";      break;
		case '07': $desc="JULIO";      break;
		case '08': $desc="AGOSTO";     break;
		case '09': $desc="SEPTIEMBRE"; break;
		case '10': $desc="OCTUBRE";    break;
		case '11': $desc="NOVIEMBRE";  break;
		case '12': $desc="DICIEMBRE";  break;
	}
	return $desc;
  }
  FUNCTION F_DCDF($V_GRUPO)
  {
    IF ($V_GRUPO=='F') $V_DGRUPO='FACTURACION';
    ELSE               $V_DGRUPO='PRODUCTIVIDAD';
    RETURN $V_DGRUPO;
  }
  function F_DEDO($C_EDO)
  {
    IF ($C_EDO=='O')
      $A_NEDO[0]="TODOS";
    ELSE
    {
      $MS_SQLEDO    = "SELECT nombre FROM edos where clave = '$C_EDO'";
      $MS_RESULTEDO = MYSQL_QUERY($MS_SQLEDO);
      $A_NEDO       = MYSQL_FETCH_ROW($MS_RESULTEDO);
    }
    RETURN $A_NEDO[0];
  }
  function F_DREG($C_REG)
  {
    $MS_SQLREG    = "SELECT nombre FROM regiones where clave = '$C_REG'";
    $MS_RESULTREG = MYSQL_QUERY($MS_SQLREG);
    $A_NREG       = MYSQL_FETCH_ROW($MS_RESULTREG);
    RETURN $A_NREG[0];
  }
  function F_DREPORTE($V_REPORTE)
  {
    SWITCH($V_REPORTE)
    {
       CASE "CAVEN":       $D_REPORTE="VENTAS POR DIVISION";   BREAK;
       CASE "CAVEZO":      $D_REPORTE="VENTAS POR ZONA";       BREAK;
       CASE "CEDOVE":      $D_REPORTE="VENTAS POR ESTADO";     BREAK;
       CASE "SECDIV":      $D_REPORTE="SECTOR DIVISION";       BREAK;
       CASE "SECEDO":      $D_REPORTE="SECTOR ESTADO";         BREAK;
       CASE "INTERCAMBIO": $D_REPORTE="INTERCAMBIO";           BREAK;
	   CASE "REGION":      $D_REPORTE="VENTAS POR REGION";     BREAK;
	   CASE "CADAFU":      $D_REPORTE="CALIDAD FACTURACION";     BREAK;
    }
    RETURN $D_REPORTE;
  }
  function F_DAREA($C_AREA)
  {
    if($C_AREA=='CFE000')
    {
      RETURN "COMISION FEDERAL DE ELECTRICIDAD";
    }
    ELSE
    {
      $MS_SQLAREA   = "SELECT nombre FROM areas where clave = '$C_AREA'";
      $MS_RESULTAREA= MYSQL_QUERY($MS_SQLAREA);
      $A_NAREA      = MYSQL_FETCH_ROW($MS_RESULTAREA);
      RETURN $A_NAREA[0];
    }
  }
  function F_DUVP($C_UVP)
  {
  	switch($C_UVP)
	{
		case 'USU': $desc="USUARIOS"; break;
		case 'VTA': $desc="VENTAS (MWh)"; break;
    	case 'PRO': $desc="PRODUCTOS (MILES $)"; break;
	}
    RETURN $desc;
  }
  function F_DEDOZONA($P_REPORTE,$C_EDOZONA)
  {
    IF($C_EDOZONA=='O')
       RETURN "RESUMEN";
    ELSE
    {
       IF ($P_REPORTE=='CEDOVE')  $V_DES=STRTOUPPER(F_DEDO($C_EDOZONA));
       IF ($P_REPORTE=='CAVEZO' || $P_REPORTE=='CAVEN' || $P_REPORTE=='INTERCAMBIO')  $V_DES=STRTOUPPER(F_DAREA($C_EDOZONA));
	   IF ($P_REPORTE=='REGION')  $V_DES=STRTOUPPER(F_DREG($C_EDOZONA));
       RETURN $V_DES;
    }
  }
  function F_NTAR($P_TAR)
  {
    SWITCH($P_TAR)
    {
       CASE "1":    $N_TAR="01";   BREAK;
       CASE "1a":   $N_TAR="1A";   BREAK;
       CASE "1b":   $N_TAR="1B";   BREAK;
       CASE "1c":   $N_TAR="1C";   BREAK;
       CASE "1d":   $N_TAR="1D";   BREAK;
       CASE "1e":   $N_TAR="1E";   BREAK;
       CASE "1f":   $N_TAR="1F";   BREAK;
       CASE "DAC":  $N_TAR="DAC";  BREAK;
       CASE "2":    $N_TAR="02";   BREAK;
       CASE "3":    $N_TAR="03";   BREAK;
       CASE "5":    $N_TAR="05";   BREAK;
       CASE "5a":   $N_TAR="5A";   BREAK;
       CASE "6":    $N_TAR="06";   BREAK;
       CASE "7":    $N_TAR="07";   BREAK;
       CASE "9":    $N_TAR="09";   BREAK;
       CASE "9M":   $N_TAR="9M";   BREAK;
       CASE "9CU":  $N_TAR="9C";   BREAK;
       CASE "I15":  $N_TAR="I15";  BREAK;
    }
    RETURN $N_TAR;
  }
   function F_DDIVEDO($V_DE)

  {

  	switch($V_DE)

	{

		case 'R': $desc="RESUMEN"; break;

		case 'E': $desc="ESTADO"; break;

	}

    RETURN $desc;

  }
?>
